home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: Delphi Borland Form
(archive/borlandDelphiForm).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Delphi Borland Form (archive/borlandDelphiForm)
| magic
| Supported |
| 100%
| file
| Delphi compiled form 'TScriptModel'
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Borland Form (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 54 50 46 30 0c 54 53 63 | 72 69 70 74 4d 6f 64 65 |TPF0.TSc|riptMode|
|00000010| 6c 00 0a 4f 4d 44 61 74 | 61 54 79 70 65 07 08 64 |l..OMDat|aType..d|
|00000020| 74 53 79 73 74 65 6d 0a | 52 65 73 75 6c 74 43 6f |tSystem.|ResultCo|
|00000030| 64 65 02 00 0c 53 63 72 | 69 70 74 73 2e 47 55 49 |de...Scr|ipts.GUI|
|00000040| 44 06 26 7b 38 36 31 44 | 35 33 39 38 2d 34 30 46 |D.&{861D|5398-40F|
|00000050| 39 2d 34 33 30 32 2d 39 | 33 31 31 2d 46 38 38 36 |9-4302-9|311-F886|
|00000060| 39 41 36 31 45 35 39 31 | 7d 07 53 63 72 69 70 74 |9A61E591|}.Script|
|00000070| 73 0e 01 04 47 55 49 44 | 06 20 42 45 36 32 38 33 |s...GUID|. BE6283|
|00000080| 42 42 38 39 31 45 34 44 | 38 32 38 31 30 45 46 33 |BB891E4D|82810EF3|
|00000090| 45 36 46 36 32 36 39 35 | 45 41 05 53 74 61 74 65 |E6F62695|EA.State|
|000000a0| 07 0a 6f 6d 49 6e 73 65 | 72 74 65 64 0a 53 63 72 |..omInse|rted.Scr|
|000000b0| 69 70 74 4e 61 6d 65 06 | 1c 53 65 61 72 63 68 20 |iptName.|.Search |
|000000c0| 4f 66 66 6c 69 6e 65 20 | 4d 65 64 69 61 20 43 6f |Offline |Media Co|
|000000d0| 6e 74 65 6e 74 06 41 75 | 74 68 6f 72 06 11 48 42 |ntent.Au|thor..HB|
|000000e0| 20 76 61 6e 20 5a 77 69 | 65 74 65 72 69 6e 67 12 | van Zwi|etering.|
|000000f0| 41 75 74 68 6f 72 49 6e | 66 6f 2e 53 74 72 69 6e |AuthorIn|fo.Strin|
|00000100| 67 73 01 06 17 68 74 74 | 70 3a 2f 2f 77 77 77 2e |gs...htt|p://www.|
|00000110| 69 64 69 6d 61 67 65 72 | 2e 63 6f 6d 00 10 53 68 |idimager|.com..Sh|
|00000120| 6f 72 74 44 65 73 63 72 | 69 70 74 69 6f 6e 06 88 |ortDescr|iption..|
|00000130| 54 68 69 73 20 73 65 61 | 72 63 68 20 73 63 72 69 |This sea|rch scri|
|00000140| 70 74 20 77 69 6c 6c 20 | 61 6c 6c 6f 77 20 79 6f |pt will |allow yo|
|00000150| 75 20 74 6f 20 73 65 6c | 65 63 74 20 61 6e 20 6f |u to sel|ect an o|
|00000160| 66 66 6c 69 6e 65 20 6d | 65 64 69 75 6d 20 61 6e |ffline m|edium an|
|00000170| 64 20 74 68 65 6e 0d 0a | 72 65 74 75 72 6e 20 61 |d then..|return a|
|00000180| 6c 6c 20 69 6d 61 67 65 | 73 20 74 68 61 74 20 61 |ll image|s that a|
|00000190| 72 65 20 6b 6e 6f 77 6e | 20 74 6f 20 74 68 65 20 |re known| to the |
|000001a0| 64 61 74 61 62 61 73 65 | 20 66 6f 72 20 74 68 65 |database| for the|
|000001b0| 20 6d 65 64 69 75 6d 2e | 0a 49 74 65 6d 73 2e 47 | medium.|.Items.G|
|000001c0| 55 49 44 06 26 7b 36 45 | 37 31 36 34 39 38 2d 36 |UID.&{6E|716498-6|
|000001d0| 46 31 30 2d 34 39 41 45 | 2d 42 43 39 43 2d 39 36 |F10-49AE|-BC9C-96|
|000001e0| 35 33 46 32 42 45 44 30 | 31 36 7d 05 49 74 65 6d |53F2BED0|16}.Item|
|000001f0| 73 0e 01 04 47 55 49 44 | 06 20 46 31 45 33 43 37 |s...GUID|. F1E3C7|
|00000200| 31 43 44 30 45 39 34 44 | 39 32 41 39 31 41 39 35 |1CD0E94D|92A91A95|
|00000210| 44 42 41 37 36 30 45 43 | 38 33 05 53 74 61 74 65 |DBA760EC|83.State|
|00000220| 07 0a 6f 6d 49 6e 73 65 | 72 74 65 64 08 49 74 65 |..omInse|rted.Ite|
|00000230| 6d 4e 61 6d 65 06 1c 53 | 65 61 72 63 68 20 4f 66 |mName..S|earch Of|
|00000240| 66 6c 69 6e 65 20 4d 65 | 64 69 61 20 43 6f 6e 74 |fline Me|dia Cont|
|00000250| 65 6e 74 12 53 6f 75 72 | 63 65 43 6f 64 65 2e 53 |ent.Sour|ceCode.S|
|00000260| 74 72 69 6e 67 73 01 06 | 03 76 61 72 06 19 20 46 |trings..|.var.. F|
|00000270| 4d 65 64 69 61 3a 20 54 | 43 61 74 61 6c 6f 67 4d |Media: T|CatalogM|
|00000280| 65 64 69 75 6d 73 3b 12 | 00 00 00 00 06 4f 70 72 |ediums;.|.....Opr|
|00000290| 6f 63 65 64 75 72 65 20 | 55 70 64 61 74 65 4c 69 |ocedure |UpdateLi|
|000002a0| 73 74 49 74 65 6d 46 72 | 6f 6d 4d 65 64 69 75 6d |stItemFr|omMedium|
|000002b0| 28 41 4c 49 74 65 6d 3a | 20 54 4c 69 73 74 49 74 |(ALItem:| TListIt|
|000002c0| 65 6d 3b 20 41 4d 65 64 | 69 75 6d 3a 20 54 43 61 |em; AMed|ium: TCa|
|000002d0| 74 61 6c 6f 67 4d 65 64 | 69 75 6d 29 3b 06 05 62 |talogMed|ium);..b|
|000002e0| 65 67 69 6e 06 27 20 20 | 41 4c 49 74 65 6d 2e 43 |egin.' |ALItem.C|
|000002f0| 61 70 74 69 6f 6e 20 3a | 3d 20 41 4d 65 64 69 75 |aption :|= AMediu|
|00000300| 6d 2e 4d 65 64 69 75 6d | 4e 61 6d 65 3b 06 18 20 |m.Medium|Name;.. |
|00000310| 20 41 4c 49 74 65 6d 2e | 53 75 62 49 74 65 6d 73 | ALItem.|SubItems|
|00000320| 2e 43 6c 65 61 72 3b 06 | 36 20 20 41 4c 49 74 65 |.Clear;.|6 ALIte|
|00000330| 6d 2e 53 75 62 49 74 65 | 6d 73 2e 41 64 64 28 49 |m.SubIte|ms.Add(I|
|00000340| 6e 74 54 6f 53 74 72 28 | 41 4d 65 64 69 75 6d 2e |ntToStr(|AMedium.|
|00000350| 4d 65 64 69 75 6d 53 65 | 72 69 61 6c 29 29 3b 06 |MediumSe|rial));.|
|00000360| 67 20 20 41 4c 49 74 65 | 6d 2e 53 75 62 49 74 65 |g ALIte|m.SubIte|
|00000370| 6d 73 2e 41 64 64 28 69 | 69 66 20 28 41 4d 65 64 |ms.Add(i|if (AMed|
|00000380| 69 75 6d 2e 41 6c 74 65 | 72 6e 61 74 65 4e 61 6d |ium.Alte|rnateNam|
|00000390| 65 20 3d 20 27 27 2c 20 | 54 72 61 6e 73 6c 61 74 |e = '', |Translat|
|000003a0| 65 28 27 3c 64 65 66 61 | 75 6c 74 3e 27 29 2c 20 |e('<defa|ult>'), |
|000003b0| 41 4d 65 64 69 75 6d 2e | 41 6c 74 65 72 6e 61 74 |AMedium.|Alternat|
|000003c0| 65 4e 61 6d 65 29 29 3b | 06 2f 20 20 41 4c 49 74 |eName));|./ ALIt|
|000003d0| 65 6d 2e 53 75 62 49 74 | 65 6d 73 2e 41 64 64 28 |em.SubIt|ems.Add(|
|000003e0| 49 6e 74 54 6f 53 74 72 | 28 41 4d 65 64 69 75 6d |IntToStr|(AMedium|
|000003f0| 2e 43 6f 75 6e 74 29 29 | 3b 06 04 65 6e 64 3b 12 |.Count))|;..end;.|
|00000400| 00 00 00 00 06 3a 66 75 | 6e 63 74 69 6f 6e 20 53 |.....:fu|nction S|
|00000410| 65 6c 65 63 74 65 64 4d | 65 64 69 75 6d 20 28 41 |electedM|edium (A|
|00000420| 49 6e 64 65 78 3a 20 49 | 6e 74 65 67 65 72 29 3a |Index: I|nteger):|
|00000430| 20 54 43 61 74 61 6c 6f | 67 4d 65 64 69 75 6d 3b | TCatalo|gMedium;|
|00000440| 06 05 62 65 67 69 6e 06 | 10 20 20 72 65 73 75 6c |..begin.|. resul|
|00000450| 74 20 3a 3d 20 6e 69 6c | 3b 12 00 00 00 00 06 38 |t := nil|;......8|
|00000460| 20 20 69 66 20 28 41 49 | 6e 64 65 78 20 3c 3d 20 | if (AI|ndex <= |
|00000470| 46 4d 65 64 69 61 2e 43 | 6f 75 6e 74 20 2d 20 31 |FMedia.C|ount - 1|
|00000480| 29 20 61 6e 64 20 28 41 | 49 6e 64 65 78 20 3e 3d |) and (A|Index >=|
|00000490| 20 30 29 20 74 68 65 6e | 06 23 20 20 20 20 72 65 | 0) then|.# re|
|000004a0| 73 75 6c 74 20 3a 3d 20 | 46 4d 65 64 69 61 2e 49 |sult := |FMedia.I|
|000004b0| 74 65 6d 73 5b 41 49 6e | 64 65 78 5d 3b 06 04 65 |tems[AIn|dex];..e|
|000004c0| 6e 64 3b 12 00 00 00 00 | 06 2f 70 72 6f 63 65 64 |nd;.....|./proced|
|000004d0| 75 72 65 20 41 64 64 52 | 65 73 75 6c 74 73 20 28 |ure AddR|esults (|
|000004e0| 41 4d 65 64 69 75 6d 3a | 20 54 43 61 74 61 6c 6f |AMedium:| TCatalo|
|000004f0| 67 4d 65 64 69 75 6d 29 | 3b 06 03 76 61 72 06 18 |gMedium)|;..var..|
|00000500| 20 20 41 49 74 65 6d 73 | 3a 20 54 43 61 74 61 6c | AItems|: TCatal|
|00000510| 6f 67 49 74 65 6d 73 3b | 06 0d 20 20 69 3a 20 49 |ogItems;|.. i: I|
|00000520| 6e 74 65 67 65 72 3b 06 | 15 20 20 41 49 6d 61 67 |nteger;.|. AImag|
|00000530| 65 3a 20 54 49 6d 61 67 | 65 49 74 65 6d 3b 06 05 |e: TImag|eItem;..|
|00000540| 62 65 67 69 6e 06 51 20 | 20 2f 2f 20 66 69 6e 64 |begin.Q | // find|
|00000550| 20 61 6c 6c 20 69 6d 61 | 67 65 73 20 69 6e 20 63 | all ima|ges in c|
|00000560| 61 74 61 6c 6f 67 20 66 | 6f 72 20 74 68 69 73 20 |atalog f|or this |
|00000570| 6d 65 64 69 75 6d 20 61 | 6e 64 20 61 64 64 20 74 |medium a|nd add t|
|00000580| 68 65 6d 20 74 6f 20 74 | 68 65 20 73 65 61 72 63 |hem to t|he searc|
|00000590| 68 20 72 65 73 75 6c 74 | 12 00 00 00 00 06 33 20 |h result|......3 |
|000005a0| 20 41 49 74 65 6d 73 20 | 3a 3d 20 54 43 61 74 61 | AItems |:= TCata|
|000005b0| 6c 6f 67 49 74 65 6d 73 | 2e 43 72 65 61 74 65 28 |logItems|.Create(|
|000005c0| 54 43 61 74 61 6c 6f 67 | 49 74 65 6d 2c 20 27 27 |TCatalog|Item, ''|
|000005d0| 29 3b 12 00 00 00 00 06 | 2c 20 20 43 61 74 61 6c |);......|, Catal|
|000005e0| 6f 67 2e 45 6e 75 6d 4d | 65 64 69 75 6d 49 74 65 |og.EnumM|ediumIte|
|000005f0| 6d 73 20 28 41 4d 65 64 | 69 75 6d 2c 20 41 49 74 |ms (AMed|ium, AIt|
|00000600| 65 6d 73 29 3b 06 31 20 | 20 53 65 61 72 63 68 52 |ems);.1 | SearchR|
|00000610| 65 73 75 6c 74 2e 49 74 | 65 6d 73 2e 44 61 74 61 |esult.It|ems.Data|
|00000620| 53 65 74 73 20 3a 3d 20 | 41 49 74 65 6d 73 2e 44 |Sets := |AItems.D|
|00000630| 61 74 61 53 65 74 73 3b | 12 00 00 00 00 06 0e 20 |ataSets;|....... |
|00000640| 20 41 49 74 65 6d 73 2e | 46 72 65 65 3b 06 04 65 | AItems.|Free;..e|
|00000650| 6e 64 3b 12 00 00 00 00 | 06 19 70 72 6f 63 65 64 |nd;.....|..proced|
|00000660| 75 72 65 20 52 65 66 72 | 65 73 68 43 6f 6e 74 65 |ure Refr|eshConte|
|00000670| 6e 74 3b 06 03 76 61 72 | 06 0d 20 20 69 3a 20 49 |nt;..var|.. i: I|
|00000680| 6e 74 65 67 65 72 3b 06 | 14 20 20 41 4c 49 74 65 |nteger;.|. ALIte|
|00000690| 6d 3a 20 54 4c 69 73 74 | 49 74 65 6d 3b 06 05 62 |m: TList|Item;..b|
|000006a0| 65 67 69 6e 06 23 20 20 | 6c 76 4f 66 66 6c 69 6e |egin.# |lvOfflin|
|000006b0| 65 4d 65 64 69 61 2e 49 | 74 65 6d 73 2e 42 65 67 |eMedia.I|tems.Beg|
|000006c0| 69 6e 55 70 64 61 74 65 | 3b 06 05 20 20 74 72 79 |inUpdate|;.. try|
|000006d0| 06 19 20 20 20 20 6c 76 | 4f 66 66 6c 69 6e 65 4d |.. lv|OfflineM|
|000006e0| 65 64 69 61 2e 43 6c 65 | 61 72 3b 12 00 00 00 00 |edia.Cle|ar;.....|
|000006f0| 06 11 20 20 20 20 46 4d | 65 64 69 61 2e 43 6c 65 |.. FM|edia.Cle|
|00000700| 61 72 3b 12 00 00 00 00 | 06 21 20 20 20 20 43 61 |ar;.....|.! Ca|
|00000710| 74 61 6c 6f 67 2e 45 6e | 75 6d 41 6c 6c 4d 65 64 |talog.En|umAllMed|
|00000720| 69 61 28 46 4d 65 64 69 | 61 29 3b 12 00 00 00 00 |ia(FMedi|a);.....|
|00000730| 06 25 20 20 20 20 66 6f | 72 20 69 20 3a 3d 20 30 |.% fo|r i := 0|
|00000740| 20 74 6f 20 46 4d 65 64 | 69 61 2e 43 6f 75 6e 74 | to FMed|ia.Count|
|00000750| 20 2d 20 31 20 64 6f 06 | 09 20 20 20 20 62 65 67 | - 1 do.|. beg|
|00000760| 69 6e 06 29 20 20 20 20 | 20 20 41 4c 49 74 65 6d |in.) | ALItem|
|00000770| 20 3a 3d 20 6c 76 4f 66 | 66 6c 69 6e 65 4d 65 64 | := lvOf|flineMed|
|00000780| 69 61 2e 49 74 65 6d 73 | 2e 41 64 64 3b 12 00 00 |ia.Items|.Add;...|
|00000790| 00 00 06 39 20 20 20 20 | 20 20 55 70 64 61 74 65 |...9 | Update|
|000007a0| 4c 69 73 74 49 74 65 6d | 46 72 6f 6d 4d 65 64 69 |ListItem|FromMedi|
|000007b0| 75 6d 20 28 41 4c 49 74 | 65 6d 2c 20 46 4d 65 64 |um (ALIt|em, FMed|
|000007c0| 69 61 2e 49 74 65 6d 73 | 5b 69 5d 29 3b 06 08 20 |ia.Items|[i]);.. |
|000007d0| 20 20 20 65 6e 64 3b 06 | 09 20 20 66 69 6e 61 6c | end;.|. final|
|000007e0| 6c 79 06 23 20 20 20 20 | 6c 76 4f 66 66 6c 69 6e |ly.# |lvOfflin|
|000007f0| 65 4d 65 64 69 61 2e 49 | 74 65 6d 73 2e 45 6e 64 |eMedia.I|tems.End|
|00000800| 55 70 64 61 74 65 3b 06 | 06 20 20 65 6e 64 3b 06 |Update;.|. end;.|
|00000810| 04 65 6e 64 3b 12 00 00 | 00 00 06 48 70 72 6f 63 |.end;...|...Hproc|
|00000820| 65 64 75 72 65 20 49 6e | 69 74 69 61 6c 69 7a 65 |edure In|itialize|
|00000830| 3b 20 20 20 20 2f 2f 20 | 75 73 65 20 74 68 69 73 |; // |use this|
|00000840| 20 70 72 6f 63 65 64 75 | 72 65 20 66 6f 72 20 67 | procedu|re for g|
|00000850| 6c 6f 62 61 6c 20 69 6e | 69 74 69 61 6c 69 7a 61 |lobal in|itializa|
|00000860| 74 69 6f 6e 06 05 62 65 | 67 69 6e 06 26 20 20 4d |tion..be|gin.& M|
|00000870| 61 69 6e 46 6f 72 6d 2e | 50 6f 73 69 74 69 6f 6e |ainForm.|Position|
|00000880| 20 3a 3d 20 70 6f 53 63 | 72 65 65 6e 43 65 6e 74 | := poSc|reenCent|
|00000890| 65 72 3b 06 02 20 20 06 | 37 20 20 46 4d 65 64 69 |er;.. .|7 FMedi|
|000008a0| 61 20 3a 3d 20 54 43 61 | 74 61 6c 6f 67 4d 65 64 |a := TCa|talogMed|
|000008b0| 69 75 6d 73 2e 43 72 65 | 61 74 65 28 54 43 61 74 |iums.Cre|ate(TCat|
|000008c0| 61 6c 6f 67 4d 65 64 69 | 75 6d 2c 20 27 27 29 3b |alogMedi|um, '');|
|000008d0| 12 00 00 00 00 06 11 20 | 20 52 65 66 72 65 73 68 |....... | Refresh|
|000008e0| 43 6f 6e 74 65 6e 74 3b | 06 04 65 6e 64 3b 12 00 |Content;|..end;..|
|000008f0| 00 00 00 06 46 70 72 6f | 63 65 64 75 72 65 20 46 |....Fpro|cedure F|
|00000900| 69 6e 61 6c 69 7a 65 3b | 20 20 20 20 20 20 2f 2f |inalize;| //|
|00000910| 20 75 73 65 20 74 68 69 | 73 20 70 72 6f 63 65 64 | use thi|s proced|
|00000920| 75 72 65 20 66 6f 72 20 | 67 6c 6f 62 61 6c 20 66 |ure for |global f|
|00000930| 69 6e 61 6c 69 7a 61 74 | 69 6f 6e 06 05 62 65 67 |inalizat|ion..beg|
|00000940| 69 6e 06 0e 20 20 46 4d | 65 64 69 61 2e 46 72 65 |in.. FM|edia.Fre|
|00000950| 65 3b 06 04 65 6e 64 3b | 12 00 00 00 00 06 29 70 |e;..end;|......)p|
|00000960| 72 6f 63 65 64 75 72 65 | 20 4f 6e 4c 76 44 62 6c |rocedure| OnLvDbl|
|00000970| 43 6c 69 63 6b 20 28 53 | 65 6e 64 65 72 3a 20 54 |Click (S|ender: T|
|00000980| 4f 62 6a 65 63 74 29 3b | 06 03 76 61 72 06 1a 20 |Object);|..var.. |
|00000990| 20 41 4d 65 64 69 75 6d | 3a 20 54 43 61 74 61 6c | AMedium|: TCatal|
|000009a0| 6f 67 4d 65 64 69 75 6d | 3b 06 05 62 65 67 69 6e |ogMedium|;..begin|
|000009b0| 06 2a 20 20 69 66 20 6c | 76 4f 66 66 6c 69 6e 65 |.* if l|vOffline|
|000009c0| 4d 65 64 69 61 2e 49 74 | 65 6d 46 6f 63 75 73 65 |Media.It|emFocuse|
|000009d0| 64 20 3d 20 6e 69 6c 20 | 74 68 65 6e 06 09 20 20 |d = nil |then.. |
|000009e0| 20 20 65 78 69 74 3b 12 | 00 00 00 00 06 3f 20 20 | exit;.|.....? |
|000009f0| 41 4d 65 64 69 75 6d 20 | 3a 3d 20 53 65 6c 65 63 |AMedium |:= Selec|
|00000a00| 74 65 64 4d 65 64 69 75 | 6d 20 28 6c 76 4f 66 66 |tedMediu|m (lvOff|
|00000a10| 6c 69 6e 65 4d 65 64 69 | 61 2e 49 74 65 6d 46 6f |lineMedi|a.ItemFo|
|00000a20| 63 75 73 65 64 2e 49 6e | 64 65 78 29 3b 06 17 20 |cused.In|dex);.. |
|00000a30| 20 69 66 20 41 4d 65 64 | 69 75 6d 20 3d 20 6e 69 | if AMed|ium = ni|
|00000a40| 6c 20 74 68 65 6e 06 09 | 20 20 20 20 65 78 69 74 |l then..| exit|
|00000a50| 3b 12 00 00 00 00 06 17 | 20 20 41 64 64 52 65 73 |;.......| AddRes|
|00000a60| 75 6c 74 73 20 28 41 4d | 65 64 69 75 6d 29 3b 06 |ults (AM|edium);.|
|00000a70| 1f 20 20 4d 61 69 6e 46 | 6f 72 6d 2e 4d 6f 64 61 |. MainF|orm.Moda|
|00000a80| 6c 52 65 73 75 6c 74 20 | 3a 3d 20 6d 72 4f 6b 3b |lResult |:= mrOk;|
|00000a90| 06 04 65 6e 64 3b 12 00 | 00 00 00 06 2a 70 72 6f |..end;..|....*pro|
|00000aa0| 63 65 64 75 72 65 20 4f | 6e 53 65 61 72 63 68 43 |cedure O|nSearchC|
|00000ab0| 6c 69 63 6b 20 28 53 65 | 6e 64 65 72 3a 20 54 4f |lick (Se|nder: TO|
|00000ac0| 62 6a 65 63 74 29 3b 06 | 05 62 65 67 69 6e 06 1b |bject);.|.begin..|
|00000ad0| 20 20 4f 6e 4c 76 44 62 | 6c 43 6c 69 63 6b 20 28 | OnLvDb|lClick (|
|00000ae0| 53 65 6e 64 65 72 29 3b | 20 20 20 06 04 65 6e 64 |Sender);| ..end|
|00000af0| 3b 00 07 56 65 72 73 69 | 6f 6e 06 03 31 2e 30 07 |;..Versi|on..1.0.|
|00000b00| 57 69 74 68 47 55 49 09 | 0b 4c 61 73 74 55 70 64 |WithGUI.|.LastUpd|
|00000b10| 61 74 65 64 05 00 f8 2d | b0 1b be 23 99 0e 40 0a |ated...-|...#..@.|
|00000b20| 50 65 72 73 69 73 74 65 | 6e 74 08 0a 46 6f 72 6d |Persiste|nt..Form|
|00000b30| 53 74 72 65 61 6d 0a 89 | 0c 00 00 54 50 46 30 0d |Stream..|...TPF0.|
|00000b40| 54 53 63 72 69 70 74 44 | 65 73 69 67 6e 10 66 72 |TScriptD|esign.fr|
|00000b50| 6d 53 65 61 72 63 68 4f | 66 66 6c 69 6e 65 04 4c |mSearchO|ffline.L|
|00000b60| 65 66 74 02 00 03 54 6f | 70 02 00 05 57 69 64 74 |eft...To|p...Widt|
|00000b70| 68 03 e2 01 06 48 65 69 | 67 68 74 03 0a 01 07 43 |h....Hei|ght....C|
|00000b80| 61 70 74 69 6f 6e 06 18 | 53 65 61 72 63 68 20 66 |aption..|Search f|
|00000b90| 6f 72 20 4f 66 66 6c 69 | 6e 65 20 4d 65 64 69 61 |or Offli|ne Media|
|00000ba0| 05 43 6f 6c 6f 72 07 09 | 63 6c 42 74 6e 46 61 63 |.Color..|clBtnFac|
|00000bb0| 65 0c 46 6f 6e 74 2e 43 | 68 61 72 73 65 74 07 0f |e.Font.C|harset..|
|00000bc0| 44 45 46 41 55 4c 54 5f | 43 48 41 52 53 45 54 0a |DEFAULT_|CHARSET.|
|00000bd0| 46 6f 6e 74 2e 43 6f 6c | 6f 72 07 0c 63 6c 57 69 |Font.Col|or..clWi|
|00000be0| 6e 64 6f 77 54 65 78 74 | 0b 46 6f 6e 74 2e 48 65 |ndowText|.Font.He|
|00000bf0| 69 67 68 74 02 f5 09 46 | 6f 6e 74 2e 4e 61 6d 65 |ight...F|ont.Name|
|00000c00| 06 0d 4d 53 20 53 61 6e | 73 20 53 65 72 69 66 0a |..MS San|s Serif.|
|00000c10| 46 6f 6e 74 2e 53 74 79 | 6c 65 0b 00 0e 4f 6c 64 |Font.Sty|le...Old|
|00000c20| 43 72 65 61 74 65 4f 72 | 64 65 72 08 0d 50 69 78 |CreateOr|der..Pix|
|00000c30| 65 6c 73 50 65 72 49 6e | 63 68 02 60 0a 54 65 78 |elsPerIn|ch.`.Tex|
|00000c40| 74 48 65 69 67 68 74 02 | 0d 00 09 54 4c 69 73 74 |tHeight.|...TList|
|00000c50| 56 69 65 77 0e 6c 76 4f | 66 66 6c 69 6e 65 4d 65 |View.lvO|fflineMe|
|00000c60| 64 69 61 04 4c 65 66 74 | 02 00 03 54 6f 70 02 00 |dia.Left|...Top..|
|00000c70| 05 57 69 64 74 68 03 da | 01 06 48 65 69 67 68 74 |.Width..|..Height|
|00000c80| 03 bf 00 05 41 6c 69 67 | 6e 07 08 61 6c 43 6c 69 |....Alig|n..alCli|
|00000c90| 65 6e 74 07 43 6f 6c 75 | 6d 6e 73 0e 01 07 43 61 |ent.Colu|mns...Ca|
|00000ca0| 70 74 69 6f 6e 06 0b 4d | 65 64 69 75 6d 20 4e 61 |ption..M|edium Na|
|00000cb0| 6d 65 05 57 69 64 74 68 | 03 96 00 00 01 07 43 61 |me.Width|......Ca|
|00000cc0| 70 74 69 6f 6e 06 07 53 | 65 72 69 61 6c 23 05 57 |ption..S|erial#.W|
|00000cd0| 69 64 74 68 02 64 00 01 | 07 43 61 70 74 69 6f 6e |idth.d..|.Caption|
|00000ce0| 06 0c 54 72 69 76 69 61 | 6c 20 4e 61 6d 65 05 57 |..Trivia|l Name.W|
|00000cf0| 69 64 74 68 03 96 00 00 | 01 07 43 61 70 74 69 6f |idth....|..Captio|
|00000d00| 6e 06 06 49 6d 61 67 65 | 73 00 00 08 52 65 61 64 |n..Image|s...Read|
|00000d10| 4f 6e 6c 79 09 09 52 6f | 77 53 65 6c 65 63 74 09 |Only..Ro|wSelect.|
|00000d20| 08 54 61 62 4f 72 64 65 | 72 02 00 09 56 69 65 77 |.TabOrde|r...View|
|00000d30| 53 74 79 6c 65 07 08 76 | 73 52 65 70 6f 72 74 00 |Style..v|sReport.|
|00000d40| 00 06 54 50 61 6e 65 6c | 06 50 61 6e 65 6c 31 04 |..TPanel|.Panel1.|
|00000d50| 4c 65 66 74 02 00 03 54 | 6f 70 03 bf 00 05 57 69 |Left...T|op....Wi|
|00000d60| 64 74 68 03 da 01 06 48 | 65 69 67 68 74 02 29 05 |dth....H|eight.).|
|00000d70| 41 6c 69 67 6e 07 08 61 | 6c 42 6f 74 74 6f 6d 08 |Align..a|lBottom.|
|00000d80| 54 61 62 4f 72 64 65 72 | 02 01 00 07 54 42 75 74 |TabOrder|....TBut|
|00000d90| 74 6f 6e 08 70 62 53 65 | 61 72 63 68 04 4c 65 66 |ton.pbSe|arch.Lef|
|00000da0| 74 02 09 03 54 6f 70 02 | 08 05 57 69 64 74 68 02 |t...Top.|..Width.|
|00000db0| 4b 06 48 65 69 67 68 74 | 02 19 07 43 61 70 74 69 |K.Height|...Capti|
|00000dc0| 6f 6e 06 07 26 53 65 61 | 72 63 68 08 54 61 62 4f |on..&Sea|rch.TabO|
|00000dd0| 72 64 65 72 02 00 00 00 | 00 0b 54 69 64 53 63 72 |rder....|..TidScr|
|00000de0| 69 70 74 65 72 00 12 53 | 6f 75 72 63 65 43 6f 64 |ipter..S|ourceCod|
|00000df0| 65 2e 53 74 72 69 6e 67 | 73 01 06 03 76 61 72 06 |e.String|s...var.|
|00000e00| 19 20 46 4d 65 64 69 61 | 3a 20 54 43 61 74 61 6c |. FMedia|: TCatal|
|00000e10| 6f 67 4d 65 64 69 75 6d | 73 3b 06 00 06 4f 70 72 |ogMedium|s;...Opr|
|00000e20| 6f 63 65 64 75 72 65 20 | 55 70 64 61 74 65 4c 69 |ocedure |UpdateLi|
|00000e30| 73 74 49 74 65 6d 46 72 | 6f 6d 4d 65 64 69 75 6d |stItemFr|omMedium|
|00000e40| 28 41 4c 49 74 65 6d 3a | 20 54 4c 69 73 74 49 74 |(ALItem:| TListIt|
|00000e50| 65 6d 3b 20 41 4d 65 64 | 69 75 6d 3a 20 54 43 61 |em; AMed|ium: TCa|
|00000e60| 74 61 6c 6f 67 4d 65 64 | 69 75 6d 29 3b 06 05 62 |talogMed|ium);..b|
|00000e70| 65 67 69 6e 06 27 20 20 | 41 4c 49 74 65 6d 2e 43 |egin.' |ALItem.C|
|00000e80| 61 70 74 69 6f 6e 20 3a | 3d 20 41 4d 65 64 69 75 |aption :|= AMediu|
|00000e90| 6d 2e 4d 65 64 69 75 6d | 4e 61 6d 65 3b 06 18 20 |m.Medium|Name;.. |
|00000ea0| 20 41 4c 49 74 65 6d 2e | 53 75 62 49 74 65 6d 73 | ALItem.|SubItems|
|00000eb0| 2e 43 6c 65 61 72 3b 06 | 36 20 20 41 4c 49 74 65 |.Clear;.|6 ALIte|
|00000ec0| 6d 2e 53 75 62 49 74 65 | 6d 73 2e 41 64 64 28 49 |m.SubIte|ms.Add(I|
|00000ed0| 6e 74 54 6f 53 74 72 28 | 41 4d 65 64 69 75 6d 2e |ntToStr(|AMedium.|
|00000ee0| 4d 65 64 69 75 6d 53 65 | 72 69 61 6c 29 29 3b 06 |MediumSe|rial));.|
|00000ef0| 67 20 20 41 4c 49 74 65 | 6d 2e 53 75 62 49 74 65 |g ALIte|m.SubIte|
|00000f00| 6d 73 2e 41 64 64 28 69 | 69 66 20 28 41 4d 65 64 |ms.Add(i|if (AMed|
|00000f10| 69 75 6d 2e 41 6c 74 65 | 72 6e 61 74 65 4e 61 6d |ium.Alte|rnateNam|
|00000f20| 65 20 3d 20 27 27 2c 20 | 54 72 61 6e 73 6c 61 74 |e = '', |Translat|
|00000f30| 65 28 27 3c 64 65 66 61 | 75 6c 74 3e 27 29 2c 20 |e('<defa|ult>'), |
|00000f40| 41 4d 65 64 69 75 6d 2e | 41 6c 74 65 72 6e 61 74 |AMedium.|Alternat|
|00000f50| 65 4e 61 6d 65 29 29 3b | 06 2f 20 20 41 4c 49 74 |eName));|./ ALIt|
|00000f60| 65 6d 2e 53 75 62 49 74 | 65 6d 73 2e 41 64 64 28 |em.SubIt|ems.Add(|
|00000f70| 49 6e 74 54 6f 53 74 72 | 28 41 4d 65 64 69 75 6d |IntToStr|(AMedium|
|00000f80| 2e 43 6f 75 6e 74 29 29 | 3b 06 04 65 6e 64 3b 06 |.Count))|;..end;.|
|00000f90| 00 06 3a 66 75 6e 63 74 | 69 6f 6e 20 53 65 6c 65 |..:funct|ion Sele|
|00000fa0| 63 74 65 64 4d 65 64 69 | 75 6d 20 28 41 49 6e 64 |ctedMedi|um (AInd|
|00000fb0| 65 78 3a 20 49 6e 74 65 | 67 65 72 29 3a 20 54 43 |ex: Inte|ger): TC|
|00000fc0| 61 74 61 6c 6f 67 4d 65 | 64 69 75 6d 3b 06 05 62 |atalogMe|dium;..b|
|00000fd0| 65 67 69 6e 06 10 20 20 | 72 65 73 75 6c 74 20 3a |egin.. |result :|
|00000fe0| 3d 20 6e 69 6c 3b 06 00 | 06 38 20 20 69 66 20 28 |= nil;..|.8 if (|
|00000ff0| 41 49 6e 64 65 78 20 3c | 3d 20 46 4d 65 64 69 61 |AIndex <|= FMedia|
|00001000| 2e 43 6f 75 6e 74 20 2d | 20 31 29 20 61 6e 64 20 |.Count -| 1) and |
|00001010| 28 41 49 6e 64 65 78 20 | 3e 3d 20 30 29 20 74 68 |(AIndex |>= 0) th|
|00001020| 65 6e 06 23 20 20 20 20 | 72 65 73 75 6c 74 20 3a |en.# |result :|
|00001030| 3d 20 46 4d 65 64 69 61 | 2e 49 74 65 6d 73 5b 41 |= FMedia|.Items[A|
|00001040| 49 6e 64 65 78 5d 3b 06 | 04 65 6e 64 3b 06 00 06 |Index];.|.end;...|
|00001050| 2f 70 72 6f 63 65 64 75 | 72 65 20 41 64 64 52 65 |/procedu|re AddRe|
|00001060| 73 75 6c 74 73 20 28 41 | 4d 65 64 69 75 6d 3a 20 |sults (A|Medium: |
|00001070| 54 43 61 74 61 6c 6f 67 | 4d 65 64 69 75 6d 29 3b |TCatalog|Medium);|
|00001080| 06 03 76 61 72 06 18 20 | 20 41 49 74 65 6d 73 3a |..var.. | AItems:|
|00001090| 20 54 43 61 74 61 6c 6f | 67 49 74 65 6d 73 3b 06 | TCatalo|gItems;.|
|000010a0| 0d 20 20 69 3a 20 49 6e | 74 65 67 65 72 3b 06 15 |. i: In|teger;..|
|000010b0| 20 20 41 49 6d 61 67 65 | 3a 20 54 49 6d 61 67 65 | AImage|: TImage|
|000010c0| 49 74 65 6d 3b 06 05 62 | 65 67 69 6e 06 51 20 20 |Item;..b|egin.Q |
|000010d0| 2f 2f 20 66 69 6e 64 20 | 61 6c 6c 20 69 6d 61 67 |// find |all imag|
|000010e0| 65 73 20 69 6e 20 63 61 | 74 61 6c 6f 67 20 66 6f |es in ca|talog fo|
|000010f0| 72 20 74 68 69 73 20 6d | 65 64 69 75 6d 20 61 6e |r this m|edium an|
|00001100| 64 20 61 64 64 20 74 68 | 65 6d 20 74 6f 20 74 68 |d add th|em to th|
|00001110| 65 20 73 65 61 72 63 68 | 20 72 65 73 75 6c 74 06 |e search| result.|
|00001120| 00 06 33 20 20 41 49 74 | 65 6d 73 20 3a 3d 20 54 |..3 AIt|ems := T|
|00001130| 43 61 74 61 6c 6f 67 49 | 74 65 6d 73 2e 43 72 65 |CatalogI|tems.Cre|
|00001140| 61 74 65 28 54 43 61 74 | 61 6c 6f 67 49 74 65 6d |ate(TCat|alogItem|
|00001150| 2c 20 27 27 29 3b 06 00 | 06 2c 20 20 43 61 74 61 |, '');..|., Cata|
|00001160| 6c 6f 67 2e 45 6e 75 6d | 4d 65 64 69 75 6d 49 74 |log.Enum|MediumIt|
|00001170| 65 6d 73 20 28 41 4d 65 | 64 69 75 6d 2c 20 41 49 |ems (AMe|dium, AI|
|00001180| 74 65 6d 73 29 3b 06 31 | 20 20 53 65 61 72 63 68 |tems);.1| Search|
|00001190| 52 65 73 75 6c 74 2e 49 | 74 65 6d 73 2e 44 61 74 |Result.I|tems.Dat|
|000011a0| 61 53 65 74 73 20 3a 3d | 20 41 49 74 65 6d 73 2e |aSets :=| AItems.|
|000011b0| 44 61 74 61 53 65 74 73 | 3b 06 00 06 0e 20 20 41 |DataSets|;.... A|
|000011c0| 49 74 65 6d 73 2e 46 72 | 65 65 3b 06 04 65 6e 64 |Items.Fr|ee;..end|
|000011d0| 3b 06 00 06 19 70 72 6f | 63 65 64 75 72 65 20 52 |;....pro|cedure R|
|000011e0| 65 66 72 65 73 68 43 6f | 6e 74 65 6e 74 3b 06 03 |efreshCo|ntent;..|
|000011f0| 76 61 72 06 0d 20 20 69 | 3a 20 49 6e 74 65 67 65 |var.. i|: Intege|
|00001200| 72 3b 06 14 20 20 41 4c | 49 74 65 6d 3a 20 54 4c |r;.. AL|Item: TL|
|00001210| 69 73 74 49 74 65 6d 3b | 06 05 62 65 67 69 6e 06 |istItem;|..begin.|
|00001220| 23 20 20 6c 76 4f 66 66 | 6c 69 6e 65 4d 65 64 69 |# lvOff|lineMedi|
|00001230| 61 2e 49 74 65 6d 73 2e | 42 65 67 69 6e 55 70 64 |a.Items.|BeginUpd|
|00001240| 61 74 65 3b 06 05 20 20 | 74 72 79 06 19 20 20 20 |ate;.. |try.. |
|00001250| 20 6c 76 4f 66 66 6c 69 | 6e 65 4d 65 64 69 61 2e | lvOffli|neMedia.|
|00001260| 43 6c 65 61 72 3b 06 00 | 06 11 20 20 20 20 46 4d |Clear;..|.. FM|
|00001270| 65 64 69 61 2e 43 6c 65 | 61 72 3b 06 00 06 21 20 |edia.Cle|ar;...! |
|00001280| 20 20 20 43 61 74 61 6c | 6f 67 2e 45 6e 75 6d 41 | Catal|og.EnumA|
|00001290| 6c 6c 4d 65 64 69 61 28 | 46 4d 65 64 69 61 29 3b |llMedia(|FMedia);|
|000012a0| 06 00 06 25 20 20 20 20 | 66 6f 72 20 69 20 3a 3d |...% |for i :=|
|000012b0| 20 30 20 74 6f 20 46 4d | 65 64 69 61 2e 43 6f 75 | 0 to FM|edia.Cou|
|000012c0| 6e 74 20 2d 20 31 20 64 | 6f 06 09 20 20 20 20 62 |nt - 1 d|o.. b|
|000012d0| 65 67 69 6e 06 29 20 20 | 20 20 20 20 41 4c 49 74 |egin.) | ALIt|
|000012e0| 65 6d 20 3a 3d 20 6c 76 | 4f 66 66 6c 69 6e 65 4d |em := lv|OfflineM|
|000012f0| 65 64 69 61 2e 49 74 65 | 6d 73 2e 41 64 64 3b 06 |edia.Ite|ms.Add;.|
|00001300| 00 06 39 20 20 20 20 20 | 20 55 70 64 61 74 65 4c |..9 | UpdateL|
|00001310| 69 73 74 49 74 65 6d 46 | 72 6f 6d 4d 65 64 69 75 |istItemF|romMediu|
|00001320| 6d 20 28 41 4c 49 74 65 | 6d 2c 20 46 4d 65 64 69 |m (ALIte|m, FMedi|
|00001330| 61 2e 49 74 65 6d 73 5b | 69 5d 29 3b 06 08 20 20 |a.Items[|i]);.. |
|00001340| 20 20 65 6e 64 3b 06 09 | 20 20 66 69 6e 61 6c 6c | end;..| finall|
|00001350| 79 06 23 20 20 20 20 6c | 76 4f 66 66 6c 69 6e 65 |y.# l|vOffline|
|00001360| 4d 65 64 69 61 2e 49 74 | 65 6d 73 2e 45 6e 64 55 |Media.It|ems.EndU|
|00001370| 70 64 61 74 65 3b 06 06 | 20 20 65 6e 64 3b 06 04 |pdate;..| end;..|
|00001380| 65 6e 64 3b 06 00 06 48 | 70 72 6f 63 65 64 75 72 |end;...H|procedur|
|00001390| 65 20 49 6e 69 74 69 61 | 6c 69 7a 65 3b 20 20 20 |e Initia|lize; |
|000013a0| 20 2f 2f 20 75 73 65 20 | 74 68 69 73 20 70 72 6f | // use |this pro|
|000013b0| 63 65 64 75 72 65 20 66 | 6f 72 20 67 6c 6f 62 61 |cedure f|or globa|
|000013c0| 6c 20 69 6e 69 74 69 61 | 6c 69 7a 61 74 69 6f 6e |l initia|lization|
|000013d0| 06 05 62 65 67 69 6e 06 | 26 20 20 4d 61 69 6e 46 |..begin.|& MainF|
|000013e0| 6f 72 6d 2e 50 6f 73 69 | 74 69 6f 6e 20 3a 3d 20 |orm.Posi|tion := |
|000013f0| 70 6f 53 63 72 65 65 6e | 43 65 6e 74 65 72 3b 06 |poScreen|Center;.|
|00001400| 02 20 20 06 37 20 20 46 | 4d 65 64 69 61 20 3a 3d |. .7 F|Media :=|
|00001410| 20 54 43 61 74 61 6c 6f | 67 4d 65 64 69 75 6d 73 | TCatalo|gMediums|
|00001420| 2e 43 72 65 61 74 65 28 | 54 43 61 74 61 6c 6f 67 |.Create(|TCatalog|
|00001430| 4d 65 64 69 75 6d 2c 20 | 27 27 29 3b 06 00 06 11 |Medium, |'');....|
|00001440| 20 20 52 65 66 72 65 73 | 68 43 6f 6e 74 65 6e 74 | Refres|hContent|
|00001450| 3b 06 04 65 6e 64 3b 06 | 00 06 46 70 72 6f 63 65 |;..end;.|..Fproce|
|00001460| 64 75 72 65 20 46 69 6e | 61 6c 69 7a 65 3b 20 20 |dure Fin|alize; |
|00001470| 20 20 20 20 2f 2f 20 75 | 73 65 20 74 68 69 73 20 | // u|se this |
|00001480| 70 72 6f 63 65 64 75 72 | 65 20 66 6f 72 20 67 6c |procedur|e for gl|
|00001490| 6f 62 61 6c 20 66 69 6e | 61 6c 69 7a 61 74 69 6f |obal fin|alizatio|
|000014a0| 6e 06 05 62 65 67 69 6e | 06 0e 20 20 46 4d 65 64 |n..begin|.. FMed|
|000014b0| 69 61 2e 46 72 65 65 3b | 06 04 65 6e 64 3b 06 00 |ia.Free;|..end;..|
|000014c0| 06 29 70 72 6f 63 65 64 | 75 72 65 20 4f 6e 4c 76 |.)proced|ure OnLv|
|000014d0| 44 62 6c 43 6c 69 63 6b | 20 28 53 65 6e 64 65 72 |DblClick| (Sender|
|000014e0| 3a 20 54 4f 62 6a 65 63 | 74 29 3b 06 03 76 61 72 |: TObjec|t);..var|
|000014f0| 06 1a 20 20 41 4d 65 64 | 69 75 6d 3a 20 54 43 61 |.. AMed|ium: TCa|
|00001500| 74 61 6c 6f 67 4d 65 64 | 69 75 6d 3b 06 05 62 65 |talogMed|ium;..be|
|00001510| 67 69 6e 06 2a 20 20 69 | 66 20 6c 76 4f 66 66 6c |gin.* i|f lvOffl|
|00001520| 69 6e 65 4d 65 64 69 61 | 2e 49 74 65 6d 46 6f 63 |ineMedia|.ItemFoc|
|00001530| 75 73 65 64 20 3d 20 6e | 69 6c 20 74 68 65 6e 06 |used = n|il then.|
|00001540| 09 20 20 20 20 65 78 69 | 74 3b 06 00 06 3f 20 20 |. exi|t;...? |
|00001550| 41 4d 65 64 69 75 6d 20 | 3a 3d 20 53 65 6c 65 63 |AMedium |:= Selec|
|00001560| 74 65 64 4d 65 64 69 75 | 6d 20 28 6c 76 4f 66 66 |tedMediu|m (lvOff|
|00001570| 6c 69 6e 65 4d 65 64 69 | 61 2e 49 74 65 6d 46 6f |lineMedi|a.ItemFo|
|00001580| 63 75 73 65 64 2e 49 6e | 64 65 78 29 3b 06 17 20 |cused.In|dex);.. |
|00001590| 20 69 66 20 41 4d 65 64 | 69 75 6d 20 3d 20 6e 69 | if AMed|ium = ni|
|000015a0| 6c 20 74 68 65 6e 06 09 | 20 20 20 20 65 78 69 74 |l then..| exit|
|000015b0| 3b 06 00 06 17 20 20 41 | 64 64 52 65 73 75 6c 74 |;.... A|ddResult|
|000015c0| 73 20 28 41 4d 65 64 69 | 75 6d 29 3b 06 1f 20 20 |s (AMedi|um);.. |
|000015d0| 4d 61 69 6e 46 6f 72 6d | 2e 4d 6f 64 61 6c 52 65 |MainForm|.ModalRe|
|000015e0| 73 75 6c 74 20 3a 3d 20 | 6d 72 4f 6b 3b 06 04 65 |sult := |mrOk;..e|
|000015f0| 6e 64 3b 06 00 06 2a 70 | 72 6f 63 65 64 75 72 65 |nd;...*p|rocedure|
|00001600| 20 4f 6e 53 65 61 72 63 | 68 43 6c 69 63 6b 20 28 | OnSearc|hClick (|
|00001610| 53 65 6e 64 65 72 3a 20 | 54 4f 62 6a 65 63 74 29 |Sender: |TObject)|
|00001620| 3b 06 05 62 65 67 69 6e | 06 1b 20 20 4f 6e 4c 76 |;..begin|.. OnLv|
|00001630| 44 62 6c 43 6c 69 63 6b | 20 28 53 65 6e 64 65 72 |DblClick| (Sender|
|00001640| 29 3b 20 20 20 06 04 65 | 6e 64 3b 00 10 53 61 76 |); ..e|nd;..Sav|
|00001650| 65 43 6f 6d 70 69 6c 65 | 64 43 6f 64 65 08 10 53 |eCompile|dCode..S|
|00001660| 68 6f 72 74 42 6f 6f 6c | 65 61 6e 45 76 61 6c 08 |hortBool|eanEval.|
|00001670| 1d 4c 69 62 4f 70 74 69 | 6f 6e 73 2e 53 65 61 72 |.LibOpti|ons.Sear|
|00001680| 63 68 50 61 74 68 2e 53 | 74 72 69 6e 67 73 01 06 |chPath.S|trings..|
|00001690| 09 24 28 43 55 52 44 49 | 52 29 06 09 24 28 41 50 |.$(CURDI|R)..$(AP|
|000016a0| 50 44 49 52 29 06 2a 44 | 3a 5c 69 64 46 4f 58 50 |PDIR).*D|:\idFOXP|
|000016b0| 72 6f 6a 65 63 74 65 6e | 5c 49 6d 61 67 65 42 72 |rojecten|\ImageBr|
|000016c0| 6f 77 73 65 72 5c 53 63 | 72 69 70 74 4c 69 62 73 |owser\Sc|riptLibs|
|000016d0| 5c 00 18 4c 69 62 4f 70 | 74 69 6f 6e 73 2e 53 6f |\..LibOp|tions.So|
|000016e0| 75 72 63 65 46 69 6c 65 | 45 78 74 06 04 2e 70 73 |urceFile|Ext...ps|
|000016f0| 63 1a 4c 69 62 4f 70 74 | 69 6f 6e 73 2e 43 6f 6d |c.LibOpt|ions.Com|
|00001700| 70 69 6c 65 64 46 69 6c | 65 45 78 74 06 04 2e 70 |piledFil|eExt...p|
|00001710| 63 75 19 4c 69 62 4f 70 | 74 69 6f 6e 73 2e 55 73 |cu.LibOp|tions.Us|
|00001720| 65 53 63 72 69 70 74 46 | 69 6c 65 73 09 11 43 61 |eScriptF|iles..Ca|
|00001730| 6c 6c 45 78 65 63 48 6f | 6f 6b 45 76 65 6e 74 08 |llExecHo|okEvent.|
|00001740| 07 43 61 74 61 6c 6f 67 | 07 0d 43 61 74 61 6c 6f |.Catalog|..Catalo|
|00001750| 67 2e 4f 77 6e 65 72 00 | 00 0d 54 53 53 45 76 65 |g.Owner.|..TSSEve|
|00001760| 6e 74 53 61 76 65 72 00 | 0e 53 63 72 69 70 74 65 |ntSaver.|.Scripte|
|00001770| 72 45 76 65 6e 74 73 06 | 48 6c 76 4f 66 66 6c 69 |rEvents.|HlvOffli|
|00001780| 6e 65 4d 65 64 69 61 2e | 4f 6e 44 62 6c 43 6c 69 |neMedia.|OnDblCli|
|00001790| 63 6b 3d 4f 6e 4c 76 44 | 62 6c 43 6c 69 63 6b 0d |ck=OnLvD|blClick.|
|000017a0| 0a 70 62 53 65 61 72 63 | 68 2e 4f 6e 43 6c 69 63 |.pbSearc|h.OnClic|
|000017b0| 6b 3d 4f 6e 53 65 61 72 | 63 68 43 6c 69 63 6b 0d |k=OnSear|chClick.|
|000017c0| 0a 00 00 00 00 00 0c 4d | 61 6e 75 61 6c 46 6f 72 |.......M|anualFor|
|000017d0| 6d 61 74 07 07 73 6d 66 | 54 65 78 74 14 53 63 72 |mat..smf|Text.Scr|
|000017e0| 69 70 74 52 65 73 6f 75 | 72 63 65 73 2e 47 55 49 |iptResou|rces.GUI|
|000017f0| 44 06 26 7b 31 34 44 39 | 31 46 38 43 2d 46 31 45 |D.&{14D9|1F8C-F1E|
|00001800| 33 2d 34 46 36 31 2d 39 | 38 36 44 2d 43 32 34 36 |3-4F61-9|86D-C246|
|00001810| 39 30 38 34 33 42 42 44 | 7d 0f 53 63 72 69 70 74 |90843BBD|}.Script|
|00001820| 52 65 73 6f 75 72 63 65 | 73 0e 00 07 56 65 72 73 |Resource|s...Vers|
|00001830| 69 6f 6e 06 03 31 2e 30 | 00 00 0b 47 72 6f 75 70 |ion..1.0|...Group|
|00001840| 73 2e 47 55 49 44 06 26 | 7b 38 38 43 30 46 41 46 |s.GUID.&|{88C0FAF|
|00001850| 37 2d 41 35 43 46 2d 34 | 32 39 41 2d 42 31 39 32 |7-A5CF-4|29A-B192|
|00001860| 2d 33 41 35 33 34 31 45 | 37 30 37 33 45 7d 06 47 |-3A5341E|7073E}.G|
|00001870| 72 6f 75 70 73 0e 00 00 | 00 |roups...|. |
+--------+-------------------------+-------------------------+--------+--------+
